/*
** computs.c
**
** Pictor, Version 1.51, Copyright (c) 1992-94 SoftCircuits
** Redistributed by permission.
*/

#include "comlib.h"

/*
** Writes a null-terminates string to the communications port.
** Returns 0 if successful, -1 if error.
*/
int computs(char *str)
{
	while(*str) {
		if(computc(*str++))
			return(-1);
	}
	return(0);

} /* computs */
